home *** CD-ROM | disk | FTP | other *** search
- //----------------------------------------------------------------------------
- // EditIntf.hpp - bcbdcc32 generated hdr (DO NOT EDIT) rev: 0
- // From: EditIntf.pas
- //----------------------------------------------------------------------------
- #ifndef EditIntfHPP
- #define EditIntfHPP
- //----------------------------------------------------------------------------
- #include <VirtIntf.hpp>
- #include <Windows.hpp>
- #include <SysUtils.hpp>
- #include <System.hpp>
- #pragma warn -par
- #pragma warn -hid
- #pragma warn -inl
-
- namespace Editintf
- {
- //-- type declarations -------------------------------------------------------
- struct TEditPos
- {
- short Col;
- long Line;
- } ;
-
- class __declspec(delphiclass) TIEditReader;
- class __declspec(pascalimplementation) TIEditReader : public Virtintf::TInterface
- {
- typedef Virtintf::TInterface inherited;
-
- public:
- virtual long __stdcall GetText(long Position, char * Buffer, long Count) = 0;
- public:
- /* TInterface.Create */ __fastcall TIEditReader(void) : Virtintf::TInterface() { }
-
- public:
- /* TObject.Destroy */ __fastcall virtual ~TIEditReader(void) { }
-
- };
-
- class __declspec(delphiclass) TIEditWriter;
- class __declspec(pascalimplementation) TIEditWriter : public Virtintf::TInterface
- {
- typedef Virtintf::TInterface inherited;
-
- public:
- virtual bool __stdcall CopyTo(long Pos) = 0;
- virtual bool __stdcall DeleteTo(long Pos) = 0;
- virtual bool __stdcall Insert(char * Text) = 0;
- virtual long __stdcall Position(void) = 0;
- public:
- /* TInterface.Create */ __fastcall TIEditWriter(void) : Virtintf::TInterface() { }
-
- public:
- /* TObject.Destroy */ __fastcall virtual ~TIEditWriter(void) { }
-
- };
-
- class __declspec(delphiclass) TIEditView;
- class __declspec(pascalimplementation) TIEditView : public Virtintf::TInterface
- {
- typedef Virtintf::TInterface inherited;
-
- public:
- virtual TEditPos __stdcall GetPos(int Index) = 0;
- virtual void __stdcall SetPos(int Index, const TEditPos &Value) = 0;
- virtual SIZE __stdcall GetViewSize(void) = 0;
- __property TEditPos CursorPos = {read=GetPos, write=SetPos, index=0};
- __property TEditPos TopPos = {read=GetPos, write=SetPos, index=1};
- __property SIZE ViewSize = {read=GetViewSize};
- public:
- /* TInterface.Create */ __fastcall TIEditView(void) : Virtintf::TInterface() { }
-
- public:
- /* TObject.Destroy */ __fastcall virtual ~TIEditView(void) { }
-
- };
-
- enum TSyntaxHighlighter { shNone, shC, shPascal, shSQL, shQuery };
-
- class __declspec(delphiclass) TIEditorInterface;
- class __declspec(pascalimplementation) TIEditorInterface : public Virtintf::TInterface
- {
- typedef Virtintf::TInterface inherited;
-
- public:
- virtual TIEditReader* __stdcall CreateReader(void) = 0;
- virtual TIEditWriter* __stdcall CreateWriter(void) = 0;
- virtual System::AnsiString __stdcall FileName(void) = 0;
- virtual long __stdcall LinesInBuffer(void) = 0;
- virtual bool __stdcall BufferModified(void) = 0;
- virtual bool __stdcall MarkModified(void) = 0;
- virtual TSyntaxHighlighter __stdcall SetSyntaxHighlighter(TSyntaxHighlighter SyntaxHighlighter) = 0
- ;
- virtual int __stdcall GetViewCount(void) = 0;
- virtual TIEditView* __stdcall GetView(int Index) = 0;
- public:
- /* TInterface.Create */ __fastcall TIEditorInterface(void) : Virtintf::TInterface() { }
-
- public:
- /* TObject.Destroy */ __fastcall virtual ~TIEditorInterface(void) { }
-
- };
-
- enum TPropertyType { ptUnknown, ptInteger, ptChar, ptEnumeration, ptFloat, ptString, ptSet, ptClass,
- ptMethod, ptWChar, ptLString, ptLWString, ptVariant };
-
- class __declspec(delphiclass) TIComponentInterface;
- typedef bool __stdcall (*TGetChildCallback)(void * Param, TIComponentInterface* ComponentInterface);
-
- class __declspec(pascalimplementation) TIComponentInterface : public Virtintf::TInterface
- {
- typedef Virtintf::TInterface inherited;
-
- public:
- virtual System::AnsiString __stdcall GetComponentType(void) = 0;
- virtual void * __stdcall GetComponentHandle(void) = 0;
- virtual TIComponentInterface* __stdcall GetParent(void) = 0;
- virtual bool __stdcall IsTControl(void) = 0;
- virtual int __stdcall GetPropCount(void) = 0;
- virtual System::AnsiString __stdcall GetPropName(int Index) = 0;
- virtual TPropertyType __stdcall GetPropType(int Index) = 0;
- virtual TPropertyType __stdcall GetPropTypeByName(const System::AnsiString Name) = 0;
- virtual bool __stdcall GetPropValue(int Index, void *Value) = 0;
- virtual bool __stdcall GetPropValueByName(const System::AnsiString Name, void *Value) = 0;
- virtual bool __stdcall SetProp(int Index, const void *Value) = 0;
- virtual bool __stdcall SetPropByName(const System::AnsiString Name, const void *Value) = 0;
- virtual bool __stdcall GetChildren(void * Param, TGetChildCallback Proc) = 0;
- virtual int __stdcall GetControlCount(void) = 0;
- virtual TIComponentInterface* __stdcall GetControl(int Index) = 0;
- virtual int __stdcall GetComponentCount(void) = 0;
- virtual TIComponentInterface* __stdcall GetComponent(int Index) = 0;
- virtual bool __stdcall Select(void) = 0;
- virtual bool __stdcall Focus(void) = 0;
- virtual bool __stdcall Delete(void) = 0;
- public:
- /* TInterface.Create */ __fastcall TIComponentInterface(void) : Virtintf::TInterface() { }
-
- public:
- /* TObject.Destroy */ __fastcall virtual ~TIComponentInterface(void) { }
-
- };
-
- class __declspec(delphiclass) TIFormInterface;
- class __declspec(pascalimplementation) TIFormInterface : public Virtintf::TInterface
- {
- typedef Virtintf::TInterface inherited;
-
- public:
- virtual System::AnsiString __stdcall FileName(void) = 0;
- virtual bool __stdcall FormModified(void) = 0;
- virtual bool __stdcall MarkModified(void) = 0;
- virtual TIComponentInterface* __stdcall GetFormComponent(void) = 0;
- virtual TIComponentInterface* __stdcall FindComponent(const System::AnsiString Name) = 0;
- virtual TIComponentInterface* __stdcall GetComponentFromHandle(void * ComponentHandle) = 0;
- virtual int __stdcall GetSelCount(void) = 0;
- virtual TIComponentInterface* __stdcall GetSelComponent(int Index) = 0;
- virtual TIComponentInterface* __stdcall GetCreateParent(void) = 0;
- virtual TIComponentInterface* __stdcall CreateComponent(TIComponentInterface* Container, const System::AnsiString
- TypeName, int X, int Y, int W, int H) = 0;
- public:
- /* TInterface.Create */ __fastcall TIFormInterface(void) : Virtintf::TInterface() { }
-
- public:
- /* TObject.Destroy */ __fastcall virtual ~TIFormInterface(void) { }
-
- };
-
- enum TResHeaderValue { hvFlags, hvLanguage, hvDataVersion, hvVersion, hvCharacteristics };
-
- class __declspec(delphiclass) TIResourceEntry;
- class __declspec(pascalimplementation) TIResourceEntry : public Virtintf::TInterface
- {
- typedef Virtintf::TInterface inherited;
-
- public:
- virtual char * __stdcall GetResourceType(void) = 0;
- virtual char * __stdcall GetResourceName(void) = 0;
- virtual bool __stdcall Change(char * NewType, char * NewName) = 0;
- virtual bool __stdcall GetHeaderValue(TResHeaderValue HeaderValue, int &Value) = 0;
- virtual bool __stdcall SetHeaderValue(TResHeaderValue HeaderValue, int Value) = 0;
- virtual void * __stdcall GetData(void) = 0;
- virtual int __stdcall GetDataSize(void) = 0;
- virtual bool __stdcall SetDataSize(int NewSize) = 0;
- virtual void * __stdcall GetEntryHandle(void) = 0;
- public:
- /* TInterface.Create */ __fastcall TIResourceEntry(void) : Virtintf::TInterface() { }
-
- public:
- /* TObject.Destroy */ __fastcall virtual ~TIResourceEntry(void) { }
-
- };
-
- class __declspec(delphiclass) TIResourceFile;
- class __declspec(pascalimplementation) TIResourceFile : public Virtintf::TInterface
- {
- typedef Virtintf::TInterface inherited;
-
- public:
- virtual System::AnsiString __stdcall FileName(void) = 0;
- virtual int __stdcall GetEntryCount(void) = 0;
- virtual TIResourceEntry* __stdcall GetEntry(int Index) = 0;
- virtual TIResourceEntry* __stdcall GetEntryFromHandle(void * EntryHandle) = 0;
- virtual TIResourceEntry* __stdcall FindEntry(char * ResType, char * Name) = 0;
- virtual bool __stdcall DeleteEntry(void * EntryHandle) = 0;
- virtual TIResourceEntry* __stdcall CreateEntry(char * ResType, char * Name, Word Flags, Word LanguageId
- , int DataVersion, int Version, int Characteristics) = 0;
- public:
- /* TInterface.Create */ __fastcall TIResourceFile(void) : Virtintf::TInterface() { }
-
- public:
- /* TObject.Destroy */ __fastcall virtual ~TIResourceFile(void) { }
-
- };
-
- enum TNotifyCode { ncModuleDeleted, ncModuleRenamed, ncEditorModified, ncFormModified, ncEditorSelected,
- ncFormSelected, ncBeforeSave, ncAfterSave, ncFormSaving, ncProjResModified };
-
- class __declspec(delphiclass) TIModuleNotifier;
- class __declspec(pascalimplementation) TIModuleNotifier : public Virtintf::TInterface
- {
- typedef Virtintf::TInterface inherited;
-
- public:
- virtual void __stdcall Notify(TNotifyCode NotifyCode) = 0;
- virtual void __stdcall ComponentRenamed(void * ComponentHandle, const System::AnsiString OldName, const System::AnsiString
- NewName) = 0;
- public:
- /* TInterface.Create */ __fastcall TIModuleNotifier(void) : Virtintf::TInterface() { }
-
- public:
- /* TObject.Destroy */ __fastcall virtual ~TIModuleNotifier(void) { }
-
- };
-
- class __declspec(delphiclass) TIModuleInterface;
- class __declspec(pascalimplementation) TIModuleInterface : public Virtintf::TInterface
- {
- typedef Virtintf::TInterface inherited;
-
- public:
- virtual TIEditorInterface* __stdcall GetEditorInterface(void) = 0;
- virtual TIFormInterface* __stdcall GetFormInterface(void) = 0;
- virtual TIModuleInterface* __stdcall GetAncestorModule(void) = 0;
- virtual TIResourceFile* __stdcall GetProjectResource(void) = 0;
- virtual bool __stdcall IsProjectModule(void) = 0;
- virtual bool __stdcall Close(void) = 0;
- virtual bool __stdcall Save(bool ForceSave) = 0;
- virtual bool __stdcall Rename(const System::AnsiString NewName) = 0;
- virtual bool __stdcall GetFileSystem( System::AnsiString &FileSystem) = 0;
- virtual bool __stdcall SetFileSystem(const System::AnsiString FileSystem) = 0;
- virtual bool __stdcall ShowSource(void) = 0;
- virtual bool __stdcall ShowForm(void) = 0;
- virtual bool __stdcall AddNotifier(TIModuleNotifier* AModuleNotifier) = 0;
- virtual bool __stdcall RemoveNotifier(TIModuleNotifier* AModuleNotifier) = 0;
- public:
- /* TInterface.Create */ __fastcall TIModuleInterface(void) : Virtintf::TInterface() { }
-
- public:
- /* TObject.Destroy */ __fastcall virtual ~TIModuleInterface(void) { }
-
- };
-
- //-- var, const, procedure ---------------------------------------------------
- #define CursorPos (int)(0)
- #define ViewTopPos (int)(1)
-
- } /* namespace Editintf */
-
- #pragma warn .par
- #pragma warn .hid
- #pragma warn .inl
-
- #if !defined(NO_IMPLICIT_NAMESPACE_USE)
- using namespace Editintf;
- #endif
- //-- end unit ----------------------------------------------------------------
- #endif // EditIntf
-